home *** CD-ROM | disk | FTP | other *** search
/ Font Garden / Font Garden (Walnut Creek) (October 1995) (1995).iso / pc / fontutil / uncompre / misc / frontgei.st / cards.xml < prev    next >
Encoding:
Text File  |  1993-05-14  |  15.9 KB  |  395 lines
  1. card_2854.xml
  2. <?xml version="1.0" encoding="utf-8" ?>
  3. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  4. <card>
  5.     <id>2854</id>
  6.     <filler1>0</filler1>
  7.     <cantDelete> <false /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <false /> </dontSearch>
  10.     <owner>2728</owner>
  11.     <link rel="stylesheet" type="text/css" href="stylesheet_3098.css" />
  12.     <part>
  13.         <id>1</id>
  14.         <type>field</type>
  15.         <visible> <true /> </visible>
  16.         <dontWrap> <false /> </dontWrap>
  17.         <dontSearch> <false /> </dontSearch>
  18.         <sharedText> <false /> </sharedText>
  19.         <fixedLineHeight> <false /> </fixedLineHeight>
  20.         <autoTab> <false /> </autoTab>
  21.         <lockText> <false /> </lockText>
  22.         <rect>
  23.             <left>4</left>
  24.             <top>20</top>
  25.             <right>220</right>
  26.             <bottom>300</bottom>
  27.         </rect>
  28.         <style>scrolling</style>
  29.         <autoSelect> <false /> </autoSelect>
  30.         <showLines> <false /> </showLines>
  31.         <wideMargins> <false /> </wideMargins>
  32.         <multipleLines> <false /> </multipleLines>
  33.         <reservedFamily> 0 </reservedFamily>
  34.         <titleWidth>0</titleWidth>
  35.         <icon>0</icon>
  36.         <textAlign>left</textAlign>
  37.         <font>Geneva</font>
  38.         <textSize>9</textSize>
  39.         <textStyle>plain</textStyle>
  40.         <textHeight>12</textHeight>
  41.         <name>The Fonts</name>
  42.         <script></script>
  43.     </part>
  44.     <part>
  45.         <id>2</id>
  46.         <type>button</type>
  47.         <visible> <true /> </visible>
  48.         <reserved5> 0 </reserved5>
  49.         <reserved4> 0 </reserved4>
  50.         <reserved3> 0 </reserved3>
  51.         <reserved2> 0 </reserved2>
  52.         <reserved1> 0 </reserved1>
  53.         <enabled> <true /> </enabled>
  54.         <rect>
  55.             <left>225</left>
  56.             <top>23</top>
  57.             <right>316</right>
  58.             <bottom>45</bottom>
  59.         </rect>
  60.         <style>roundrect</style>
  61.         <showName> <true /> </showName>
  62.         <highlight> <false /> </highlight>
  63.         <autoHighlight> <false /> </autoHighlight>
  64.         <sharedHighlight> <true /> </sharedHighlight>
  65.         <family>0</family>
  66.         <titleWidth>0</titleWidth>
  67.         <icon>0</icon>
  68.         <textAlign>center</textAlign>
  69.         <font>Chicago</font>
  70.         <textSize>12</textSize>
  71.         <textStyle>plain</textStyle>
  72.         <name>Open FG‚Ķ</name>
  73.         <script>on mouseUpanswer "Please make sure you have a copy of FontGeist"¬¨&& "before going on. A (harmless) modification of FrontGeist's"¬¨&& "STR# resources will be operated after acceptation of this dialog."¬¨with "Cancel" or "OK"if it is "OK" thenanswer file "Please locate your copy of FontGeist" of type "APPL"if it is not empty then put it into thePathend ifget mergeSTR(thePath)if it is not empty thenanswer itexit mouseupend ifput ResText("STR#",1,thePath) into theResif word 1 of theRes is "Error" thenanswer theResexit mouseupend ifput theRes into cd fld "The Fonts"put thePath into cd fld "FG Path"put quote & the short name of me & quote && "operation completed"¬¨into cd fld "TheMess"end mouseUpfunction mergeSTR thePathset cursor to 4put FullResList("T=STR#","W=" & thePath,"O=I") into theIDsif word 1 of theIDs is "Error" thenreturn theIDsexit mergeSTRend ifput the number of lines of theIDs into nif n = 0 thenreturn "Error : There is no STR# resource !!"else if (n = 1) and (theIDs is "1") thenreturn emptyelseput "Merging of STR# resources‚Ķ"¬¨into cd fld "TheMess"put empty into FontListrepeat with i = 1 to nput ResText("STR#",line i of theIDs,thePath) into theResif word 1 of theRes is "Error" thenreturn theResexit mergeSTRend ifput theRes & return after last line of FontListend repeatput stripTrailers(FontList) into FontListrepeat with i = 1 to nKillRes "STR#",line i of theIDs,thePathget the resultif word 1 of it is "Error" thenreturn itexit mergeSTRend ifend repeatTextRes FontList,"STR#",1,"All Fonts",thePathget the resultif word 1 of it is "Error" thenreturn itexit mergeSTRend ifset cursor to 1put "Merging of STR# resources completed"¬¨into cd fld "TheMess"return emptyend ifend mergeSTR</script>
  74.     </part>
  75.     <part>
  76.         <id>3</id>
  77.         <type>field</type>
  78.         <visible> <true /> </visible>
  79.         <dontWrap> <false /> </dontWrap>
  80.         <dontSearch> <false /> </dontSearch>
  81.         <sharedText> <false /> </sharedText>
  82.         <fixedLineHeight> <false /> </fixedLineHeight>
  83.         <autoTab> <false /> </autoTab>
  84.         <lockText> <true /> </lockText>
  85.         <rect>
  86.             <left>4</left>
  87.             <top>326</top>
  88.             <right>316</right>
  89.             <bottom>342</bottom>
  90.         </rect>
  91.         <style>rectangle</style>
  92.         <autoSelect> <false /> </autoSelect>
  93.         <showLines> <false /> </showLines>
  94.         <wideMargins> <false /> </wideMargins>
  95.         <multipleLines> <false /> </multipleLines>
  96.         <reservedFamily> 0 </reservedFamily>
  97.         <titleWidth>0</titleWidth>
  98.         <icon>0</icon>
  99.         <textAlign>left</textAlign>
  100.         <font>Geneva</font>
  101.         <textSize>9</textSize>
  102.         <textStyle>plain</textStyle>
  103.         <textHeight>12</textHeight>
  104.         <name>FG Path</name>
  105.         <script></script>
  106.     </part>
  107.     <part>
  108.         <id>6</id>
  109.         <type>button</type>
  110.         <visible> <true /> </visible>
  111.         <reserved5> 0 </reserved5>
  112.         <reserved4> 0 </reserved4>
  113.         <reserved3> 0 </reserved3>
  114.         <reserved2> 0 </reserved2>
  115.         <reserved1> 0 </reserved1>
  116.         <enabled> <true /> </enabled>
  117.         <rect>
  118.             <left>225</left>
  119.             <top>52</top>
  120.             <right>315</right>
  121.             <bottom>73</bottom>
  122.         </rect>
  123.         <style>roundrect</style>
  124.         <showName> <true /> </showName>
  125.         <highlight> <false /> </highlight>
  126.         <autoHighlight> <false /> </autoHighlight>
  127.         <sharedHighlight> <true /> </sharedHighlight>
  128.         <family>0</family>
  129.         <titleWidth>0</titleWidth>
  130.         <icon>0</icon>
  131.         <textAlign>center</textAlign>
  132.         <font>Chicago</font>
  133.         <textSize>12</textSize>
  134.         <textStyle>plain</textStyle>
  135.         <name>Save FG</name>
  136.         <script>on mouseUpput cd fld "FG Path" into thePathput FullResList("T=STR#","W=" & thePath,"O=I") into theIDsif word 1 of theIDs is "Error" thenanswer theIDsexit mouseupend ifif theIDs is not "1" thenanswer "Error : STR# resources were not merged."exit mouseupend ifTextRes StripTrailers(cd fld "The Fonts"),¬¨"STR#",1,"All Fonts",thePath,return,trueget the resultif word 1 of it is "Error" thenanswer itexit mouseupend ifput quote & the short name of me & quote && "operation completed"¬¨into cd fld "TheMess"end mouseUp</script>
  137.     </part>
  138.     <part>
  139.         <id>7</id>
  140.         <type>field</type>
  141.         <visible> <true /> </visible>
  142.         <dontWrap> <false /> </dontWrap>
  143.         <dontSearch> <false /> </dontSearch>
  144.         <sharedText> <false /> </sharedText>
  145.         <fixedLineHeight> <false /> </fixedLineHeight>
  146.         <autoTab> <false /> </autoTab>
  147.         <lockText> <true /> </lockText>
  148.         <rect>
  149.             <left>4</left>
  150.             <top>2</top>
  151.             <right>73</right>
  152.             <bottom>18</bottom>
  153.         </rect>
  154.         <style>opaque</style>
  155.         <autoSelect> <false /> </autoSelect>
  156.         <showLines> <false /> </showLines>
  157.         <wideMargins> <false /> </wideMargins>
  158.         <multipleLines> <false /> </multipleLines>
  159.         <reservedFamily> 0 </reservedFamily>
  160.         <titleWidth>0</titleWidth>
  161.         <icon>0</icon>
  162.         <textAlign>left</textAlign>
  163.         <font>Geneva</font>
  164.         <textSize>9</textSize>
  165.         <textStyle>bold</textStyle>
  166.         <textHeight>12</textHeight>
  167.         <name></name>
  168.         <script></script>
  169.     </part>
  170.     <part>
  171.         <id>8</id>
  172.         <type>field</type>
  173.         <visible> <true /> </visible>
  174.         <dontWrap> <false /> </dontWrap>
  175.         <dontSearch> <false /> </dontSearch>
  176.         <sharedText> <false /> </sharedText>
  177.         <fixedLineHeight> <false /> </fixedLineHeight>
  178.         <autoTab> <false /> </autoTab>
  179.         <lockText> <true /> </lockText>
  180.         <rect>
  181.             <left>4</left>
  182.             <top>305</top>
  183.             <right>67</right>
  184.             <bottom>322</bottom>
  185.         </rect>
  186.         <style>opaque</style>
  187.         <autoSelect> <false /> </autoSelect>
  188.         <showLines> <false /> </showLines>
  189.         <wideMargins> <false /> </wideMargins>
  190.         <multipleLines> <false /> </multipleLines>
  191.         <reservedFamily> 0 </reservedFamily>
  192.         <titleWidth>0</titleWidth>
  193.         <icon>0</icon>
  194.         <textAlign>left</textAlign>
  195.         <font>Geneva</font>
  196.         <textSize>9</textSize>
  197.         <textStyle>bold</textStyle>
  198.         <textHeight>12</textHeight>
  199.         <name></name>
  200.         <script></script>
  201.     </part>
  202.     <part>
  203.         <id>9</id>
  204.         <type>field</type>
  205.         <visible> <true /> </visible>
  206.         <dontWrap> <false /> </dontWrap>
  207.         <dontSearch> <false /> </dontSearch>
  208.         <sharedText> <false /> </sharedText>
  209.         <fixedLineHeight> <false /> </fixedLineHeight>
  210.         <autoTab> <false /> </autoTab>
  211.         <lockText> <true /> </lockText>
  212.         <rect>
  213.             <left>61</left>
  214.             <top>305</top>
  215.             <right>315</right>
  216.             <bottom>322</bottom>
  217.         </rect>
  218.         <style>rectangle</style>
  219.         <autoSelect> <false /> </autoSelect>
  220.         <showLines> <false /> </showLines>
  221.         <wideMargins> <false /> </wideMargins>
  222.         <multipleLines> <false /> </multipleLines>
  223.         <reservedFamily> 0 </reservedFamily>
  224.         <titleWidth>0</titleWidth>
  225.         <icon>0</icon>
  226.         <textAlign>left</textAlign>
  227.         <font>Geneva</font>
  228.         <textSize>9</textSize>
  229.         <textStyle>plain</textStyle>
  230.         <textHeight>12</textHeight>
  231.         <name>theMess</name>
  232.         <script></script>
  233.     </part>
  234.     <part>
  235.         <id>10</id>
  236.         <type>button</type>
  237.         <visible> <true /> </visible>
  238.         <reserved5> 0 </reserved5>
  239.         <reserved4> 0 </reserved4>
  240.         <reserved3> 0 </reserved3>
  241.         <reserved2> 0 </reserved2>
  242.         <reserved1> 0 </reserved1>
  243.         <enabled> <true /> </enabled>
  244.         <rect>
  245.             <left>230</left>
  246.             <top>275</top>
  247.             <right>315</right>
  248.             <bottom>299</bottom>
  249.         </rect>
  250.         <style>roundrect</style>
  251.         <showName> <true /> </showName>
  252.         <highlight> <false /> </highlight>
  253.         <autoHighlight> <false /> </autoHighlight>
  254.         <sharedHighlight> <true /> </sharedHighlight>
  255.         <family>0</family>
  256.         <titleWidth>0</titleWidth>
  257.         <icon>0</icon>
  258.         <textAlign>center</textAlign>
  259.         <font>Chicago</font>
  260.         <textSize>12</textSize>
  261.         <textStyle>plain</textStyle>
  262.         <name>Doc‚Ķ</name>
  263.         <script>on mouseUpgo card "Help"end mouseUp</script>
  264.     </part>
  265.     <part>
  266.         <id>11</id>
  267.         <type>button</type>
  268.         <visible> <true /> </visible>
  269.         <reserved5> 0 </reserved5>
  270.         <reserved4> 0 </reserved4>
  271.         <reserved3> 0 </reserved3>
  272.         <reserved2> 0 </reserved2>
  273.         <reserved1> 0 </reserved1>
  274.         <enabled> <true /> </enabled>
  275.         <rect>
  276.             <left>225</left>
  277.             <top>82</top>
  278.             <right>316</right>
  279.             <bottom>103</bottom>
  280.         </rect>
  281.         <style>roundrect</style>
  282.         <showName> <true /> </showName>
  283.         <highlight> <false /> </highlight>
  284.         <autoHighlight> <false /> </autoHighlight>
  285.         <sharedHighlight> <true /> </sharedHighlight>
  286.         <family>0</family>
  287.         <titleWidth>0</titleWidth>
  288.         <icon>0</icon>
  289.         <textAlign>center</textAlign>
  290.         <font>Chicago</font>
  291.         <textSize>12</textSize>
  292.         <textStyle>plain</textStyle>
  293.         <name>Launch FG</name>
  294.         <script>on mouseUpput cd fld "FG Path" into thePathif thePath is not empty then open thePathend mouseUp</script>
  295.     </part>
  296.     <content>
  297.         <layer>card</layer>
  298.         <id>7</id>
  299.         <text>The Fonts:</text>
  300.     </content>
  301.     <content>
  302.         <layer>card</layer>
  303.         <id>8</id>
  304.         <text>Message:</text>
  305.     </content>
  306.     <name></name>
  307.     <script></script>
  308. </card>
  309.  
  310.  
  311. card_3675.xml
  312. <?xml version="1.0" encoding="utf-8" ?>
  313. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  314. <card>
  315.     <id>3675</id>
  316.     <filler1>0</filler1>
  317.     <cantDelete> <false /> </cantDelete>
  318.     <showPict> <true /> </showPict>
  319.     <dontSearch> <false /> </dontSearch>
  320.     <owner>2728</owner>
  321.     <link rel="stylesheet" type="text/css" href="stylesheet_3098.css" />
  322.     <part>
  323.         <id>1</id>
  324.         <type>field</type>
  325.         <visible> <true /> </visible>
  326.         <dontWrap> <false /> </dontWrap>
  327.         <dontSearch> <false /> </dontSearch>
  328.         <sharedText> <false /> </sharedText>
  329.         <fixedLineHeight> <false /> </fixedLineHeight>
  330.         <autoTab> <false /> </autoTab>
  331.         <lockText> <false /> </lockText>
  332.         <rect>
  333.             <left>4</left>
  334.             <top>4</top>
  335.             <right>314</right>
  336.             <bottom>314</bottom>
  337.         </rect>
  338.         <style>scrolling</style>
  339.         <autoSelect> <false /> </autoSelect>
  340.         <showLines> <false /> </showLines>
  341.         <wideMargins> <false /> </wideMargins>
  342.         <multipleLines> <false /> </multipleLines>
  343.         <reservedFamily> 0 </reservedFamily>
  344.         <titleWidth>0</titleWidth>
  345.         <icon>0</icon>
  346.         <textAlign>left</textAlign>
  347.         <font>Geneva</font>
  348.         <textSize>12</textSize>
  349.         <textStyle>plain</textStyle>
  350.         <textHeight>16</textHeight>
  351.         <name>Help</name>
  352.         <script></script>
  353.     </part>
  354.     <part>
  355.         <id>2</id>
  356.         <type>button</type>
  357.         <visible> <true /> </visible>
  358.         <reserved5> 0 </reserved5>
  359.         <reserved4> 0 </reserved4>
  360.         <reserved3> 0 </reserved3>
  361.         <reserved2> 0 </reserved2>
  362.         <reserved1> 0 </reserved1>
  363.         <enabled> <true /> </enabled>
  364.         <rect>
  365.             <left>251</left>
  366.             <top>317</top>
  367.             <right>315</right>
  368.             <bottom>340</bottom>
  369.         </rect>
  370.         <style>roundrect</style>
  371.         <showName> <true /> </showName>
  372.         <highlight> <false /> </highlight>
  373.         <autoHighlight> <false /> </autoHighlight>
  374.         <sharedHighlight> <true /> </sharedHighlight>
  375.         <family>0</family>
  376.         <titleWidth>0</titleWidth>
  377.         <icon>0</icon>
  378.         <textAlign>center</textAlign>
  379.         <font>Chicago</font>
  380.         <textSize>12</textSize>
  381.         <textStyle>plain</textStyle>
  382.         <name>OK</name>
  383.         <script>on mouseUpgo card 1end mouseUp</script>
  384.     </part>
  385.     <content>
  386.         <layer>card</layer>
  387.         <id>1</id>
  388.         <text><span class="style2">rontGeist 1.0</span><span class="style1"> by F. Chaplais</span><span class="style6">FrontGeist</span><span class="style5"> is a front end for the </span><span class="style4">FontGeist utility</span><span class="style5"> of Jonathan Z. Simon. </span><span class="style4">FontGeist</span><span class="style5"> itself gives you access to all of the "Ghost Fonts" available in the database of ATM v. 3.x a.k.a. "SuperATM". So, if you don't have super ATM, don't bother going on with this stack; if you don't have </span><span class="style4">FontGeist</span><span class="style5">, download it fast (it's available by anonymous FTP at UMich, among others); it will really give the best of your SuperATM buy!OK, so now, why </span><span class="style6">FrontGeist </span><span class="style5">?Well, the reason is that the list of the fonts generated by </span><span class="style4">FontGeist</span><span class="style5"> is strored in STR# resources, and that using ResEdit to modify these is an awful pain. The purpose of this stack is to give you easy access to these resources, with a friendly interface.You will use three buttons:</span><span class="style7">Open FG‚Ķ</span><span class="style5"> will prompt you for the location of your FontGeist application and store the file path in the lowest field on the card. If FontGeist has more than one STR# resource, they will be  merged into STR# ID 1. The reason for that is that </span><span class="style4">Fontgeist</span><span class="style5"> expects continously numbered STR# IDs in order to operate, and this is painful to manage. Moreover, you will not need several STR# fonts, since it is quite easy to edit the list with this stack. After this is taken care of, the STR# resource ID 1 will be opened and written  into the big edit field at the left of the card. There you will be able to edit the list of fonts with standard text editing methods. All you need is to follow the rule: 1 line = 1 font. In particular, you can copy and paste Adobe Font Names from the file supplied with the FontGeist release.</span><span class="style7">SaveFG</span><span class="style5"> will save your configuration to FontGeist. Note that trailing blank lines will be deleted before saving.</span><span class="style7">Launch FG</span><span class="style5"> will lauch the FontGeist application as indicated at the bottom of your card. FontGeist will generate the fonts and return to Hypercard. Do this to generate as many fonts as you wish.</span><span class="style9">Aknowlegements</span><span class="style5">My thanks first to  Jonathan Z. Simon for his utility. Until I discovered it, I was quite doubtful about the value of my SuperATM buy, as the fonts accessible through FontBuilder are so few.This stacks uses the following external routines:</span><span class="style4">KillRes, TextRes, ResText, FullResList.</span><span class="style5">All of them are copyrighted </span><span class="style10">¬© Frederic Rinaldi, 1989‚Ķ1993.</span><span class="style5">Many thanks to F. Rinaldi, and in particular for his ResText/TextRes package, without which I would not even have thought of writing this stack.</span><span class="style9">Comments</span><span class="style5"> should be sent toe-mail: chaplais@cas.ensmp.fr (preferably)CalvaCom: FC66</span><span class="style9">Legal Stuff:</span><span class="style5">No legal stuff. I hold no copyright over this software or any commercial right. It is strictly public domain. Consider it as a spontanous creation somewhere in the network. The externals are copyrighted and free for any  non commercial use.</span></text>
  389.     </content>
  390.     <name>Help</name>
  391.     <script></script>
  392. </card>
  393.  
  394.  
  395.